Avoid an overflow error in emacs-module.c

* src/emacs-module.c (Fmodule_load): Allow creating a bignum
to avoid overflow error

diff --git a/src/emacs-module.c b/src/emacs-module.c
index 1ecba8603ff9b3737c030547c013ae3e7146b1b9..0dcd7f0cc5aa92edff9ccca13dcbf47ea7af9e13 100644 (file)
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -747,11 +747,7 @@ DEFUN ("module-load", Fmodule_load, Smodule_load, 1, 1, 0,
   maybe_quit ();
 
   if (r != 0)
-    {
-      if (FIXNUM_OVERFLOW_P (r))
-        overflow_error ();
-      xsignal2 (Qmodule_init_failed, file, make_fixnum (r));
-    }
+    xsignal2 (Qmodule_init_failed, file, INT_TO_INTEGER (r));
 
   module_signal_or_throw (&env_priv);
   return unbind_to (count, Qt);